home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / Tools / Dev / powerd / lib / powerd_lib.lha / PowerD / OpenS.ass < prev    next >
Encoding:
Text File  |  2000-02-02  |  348 b   |  20 lines
  1.     xdef    _OpenS
  2.  
  3. _OpenS    move.l    a6,-(a7)
  4.     lea    (.ns,pc),a0
  5.     move.l    (4+4,a7),(32,a0)
  6.     move.l    (4+8,a7),(20,a0)
  7.     move.w    (4+14,a7),(12,a0)
  8.     move.w    (4+18,a7),(8,a0)
  9.     move.w    (4+22,a7),(6,a0)
  10.     move.w    (4+26,a7),(4,a0)
  11.     move.l    _IntuitionBase,a6
  12.     jsr    (-198,a6)
  13.     move.l    (a7)+,a6
  14.     rts
  15.  
  16. .ns    dc.w    0,0,640,256,1,$0001,$8000,$100f
  17.     dc.l    0,0,0,0,0
  18.  
  19.     xref    _IntuitionBase
  20.